(Text Lines): Don't add -1 in current-line.

diff --git a/lispref/positions.texi b/lispref/positions.texi
index 1dee0398050546b7ad9b21970af55b075a52d408..100b55d01ddec0b732fdc68af15db96e09d881bc 100644 (file)
--- a/lispref/positions.texi
+++ b/lispref/positions.texi
@@ -403,8 +403,7 @@ Here is an example of using @code{count-lines}:
 (defun current-line ()
   "Return the vertical position of point@dots{}"
   (+ (count-lines (window-start) (point))
-     (if (= (current-column) 0) 1 0)
-     -1))
+     (if (= (current-column) 0) 1 0)))
 @end group
 @end example
 @end defun